(shadow-copy-file): Revert previous change.
authorRichard M. Stallman <rms@gnu.org>
Thu, 25 Dec 2008 08:08:13 +0000 (08:08 +0000)
committerRichard M. Stallman <rms@gnu.org>
Thu, 25 Dec 2008 08:08:13 +0000 (08:08 +0000)
This code as it was should work properly with buffer-swapped-with.

lisp/shadowfile.el

index ece12c367e12c5265742e7f426da8db801c72d39..04da2c5eb3ef43972779a7bdbec333b5b6b11697 100644 (file)
@@ -575,13 +575,7 @@ site."
       (set-buffer buffer)
       (condition-case i
          (progn
-           (if buffer-swapped-with
-               (progn
-                 (buffer-swap-text buffer-swapped-with)
-                 (unwind-protect
-                     (write-region nil nil to)
-                   (buffer-swap-text buffer-swapped-with)))
-             (write-region nil nil to))
+            (write-region nil nil to)
             (shadow-remove-from-todo s))
         (error (message "Shadow %s not updated!" (cdr s)))))))